Store symbols in rcirc-acked-capabilities

* rcirc.el (rcirc-handler-CAP): Use intern and downcase

diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el
index 6e4f99b24c7350142cf9d990ed5379bed644e148..7c08bc43e765f088802e89a4c9af7216c17578c3 100644 (file)
--- a/lisp/net/rcirc.el
+++ b/lisp/net/rcirc.el
@@ -3469,7 +3469,7 @@ is the process object for the current connection."
     (let ((subcmd (cadr args)))
       (dolist (cap (cddr args))
         (cond ((string= subcmd "ACK")
-               (push cap rcirc-acked-capabilities)
+               (push (intern (downcase cap)) rcirc-acked-capabilities)
                (setq rcirc-requested-capabilities
                      (delete cap rcirc-requested-capabilities)))
               ((string= subcmd "NAK")